home *** CD-ROM | disk | FTP | other *** search
/ NetNews Offline 2 / NetNews Offline Volume 2.iso / news / comp / sys / amiga / programmer / 1545 < prev    next >
Encoding:
Text File  |  1996-08-05  |  968 b   |  42 lines
  1. Path: mn5.swip.net!usenet
  2. From: m-29431@mailbox.swipnet.se (Daniel Adolfsson)
  3. Newsgroups: comp.sys.amiga.programmer
  4. Subject: CreateNewProc() in Amiga E
  5. Date: 20 Jan 1996 18:00:30 GMT
  6. Organization: -
  7. Message-ID: <618.6593T1134T901@mailbox.swipnet.se>
  8. NNTP-Posting-Host: dialup103-005.swipnet.se
  9. X-Newsreader: THOR 2.22 (Amiga;TCP/IP) *UNREGISTERED*
  10.  
  11.  
  12. How should I get this E-program to work? When I run it, a guru-requester
  13. comes up telling me that program 'subtask' failed...
  14.  
  15. MODULE    'dos/dos',
  16.                 'dos/dostags',
  17.                 'utility/tagitem'
  18.  
  19. DEF mama
  20.  
  21. PROC main()
  22.     mama:=FindTask(0)
  23.     CreateNewProc([NP_ENTRY,{subtaskcode},NP_NAME,'subtask',TAG_END])
  24.     Wait(SIGBREAKF_CTRL_F)
  25.     WHILE (FindTask('subtask')) DO Delay(10)
  26. ENDPROC
  27.  
  28. PROC subtaskcode()
  29.     DisplayBeep(0)
  30.     Delay(50)
  31.     Signal(mama,SIGBREAKF_CTRL_F)
  32. ENDPROC
  33.  
  34.  
  35. --
  36. /Daniel
  37.  
  38.   _/ Systemfriendly programmer | Amiga - Back for the Future! | IRC:  \_
  39.  /  [snma^ced^monam^fetchrefs] | ╗ PGP Public key available ½ | Sensei  \
  40.  
  41.  
  42.